Visual Basic Source Code/Visual Basic Source Code.iso/vbsource/patter/form1.frm

Text File | 1995-05-08 | 4KB | 128 lines

VERSION 2.00
Begin Form Form1
   BackColor       =   &H00C1C1C1&
   Caption         =   "Form1"
   ClientHeight    =   3465
   ClientLeft      =   1170
   ClientTop       =   2205
   ClientWidth     =   8280
   Height          =   3870
   Left            =   1110
   LinkMode        =   1  'Source
   LinkTopic       =   "Form1"
   ScaleHeight     =   3465
   ScaleWidth      =   8280
   Top             =   1860
   Width           =   8400
   Begin PictureBox SSPanel1
      BackColor       =   &H000000FF&
      Height          =   1000
      Left            =   0
      ScaleHeight     =   975
      ScaleWidth      =   975
      TabIndex        =   8
      Top             =   0
      Width           =   1000
   End
   Begin PictureBox SSPanel2
      BackColor       =   &H000000FF&
      Height          =   1000
      Left            =   0
      ScaleHeight     =   975
      ScaleWidth      =   975
      TabIndex        =   0
      Top             =   0
      Width           =   1000
      Begin CommandButton Command7
         BackColor       =   &H00DFDFDF&
         Caption         =   "Pattern 7"
         Height          =   360
         Left            =   165
         TabIndex        =   7
         Top             =   2370
         Width           =   1020
      End
      Begin CommandButton Command6
         BackColor       =   &H009F9F9F&
         Caption         =   "Pattern 6"
         Height          =   360
         Left            =   165
         TabIndex        =   6
         Top             =   1995
         Width           =   1020
      End
      Begin CommandButton Command5
         BackColor       =   &H00C6C6C6&
         Caption         =   "Pattern 5"
         Height          =   360
         Left            =   165
         TabIndex        =   5
         Top             =   1620
         Width           =   1020
      End
      Begin CommandButton Command4
         BackColor       =   &H00CFD1D1&
         Caption         =   "Pattern 4"
         Height          =   360
         Left            =   165
         TabIndex        =   4
         Top             =   1245
         Width           =   1020
      End
      Begin CommandButton Command3
         Caption         =   "Pattern 3"
         Height          =   360
         Left            =   165
         TabIndex        =   3
         Top             =   870
         Width           =   1020
      End
      Begin CommandButton Command2
         BackColor       =   &H00C8CACA&
         Caption         =   "Pattern 2"
         Height          =   360
         Left            =   165
         TabIndex        =   2
         Top             =   495
         Width           =   1020
      End
      Begin CommandButton Command1
         BackColor       =   &H00D5D5D5&
         Caption         =   "Pattern 1"
         Height          =   360
         Left            =   165
         TabIndex        =   1
         Top             =   120
         Width           =   1020
      End
   End
End
Sub Command1_Click ()
    form1.backcolor = &HC1C1C1
End Sub

Sub Command2_Click ()
form1.backcolor = &HC8CACA
End Sub

Sub Command3_Click ()
form1.backcolor = &HCFD1D1
End Sub

Sub Command4_Click ()
form1.backcolor = &HC6C6C6
End Sub

Sub Command5_Click ()
form1.backcolor = &H9F9F9F
End Sub

Sub Command6_Click ()
form1.backcolor = &HDFDFDF
End Sub

Sub Command7_Click ()
form1.backcolor = &HD5D5D5
End Sub